home *** CD-ROM | disk | FTP | other *** search
/ Aminet 41 / Aminet 41 (2001)(Schatztruhe)[!][Feb 2001].iso / Aminet / game / data / DC-EMBond15Lvl.lha / DC-EMBond15Lvl / InstallIII < prev   
Text File  |  2000-10-07  |  369b  |  33 lines

  1. .Key NAME/A
  2. .bra {
  3. .ket }
  4.  
  5. Assign EMTEMP{$$}: ""
  6.  
  7. Failat 21
  8. CD DC:
  9. If WARN
  10.  Skip
  11. EndIf
  12.  
  13. CD EMTEMP{$$}:
  14. Echo " DC:{NAME} " NOLINE
  15. If EXISTS DC:{NAME}
  16.  Echo "already exists."
  17.  Ask " Overwrite (y/N) ?"
  18.  If NOT WARN
  19.   Skip
  20.  EndIf
  21. Else
  22.  MakeDir DC:{NAME}
  23.  If WARN
  24.   Skip
  25.  EndIf
  26.  Echo "(Dir)  [created]"
  27. EndIf
  28.  
  29. Copy {NAME}/ TO DC:{NAME}/ CLONE
  30.  
  31. Lab
  32. Assign EMTEMP{$$}: REMOVE
  33.